home *** CD-ROM | disk | FTP | other *** search
/ PC Gamer (Italian) 30 / PC Gamer IT CD 30 1-2.iso / MOTS / GAMEDATA / EPISODE / JKM_PCG.GOO / cog_s1l2_sectorliteanim.cog < prev    next >
Text File  |  1998-02-25  |  2KB  |  78 lines
  1.  
  2. # Jedi Knight Missions Cog Script
  3. #
  4. # S1L2_Exploswitch.COG
  5. #
  6. # Shootable switch cog for level 2
  7. #
  8. # [DB & TL]
  9. #
  10. # (C) 1997 LucasArts Entertainment Co. All Rights Reserved
  11. #
  12. # Generic Script to set a sector to pulse light
  13. # Min/Max at pulse messages. Pulse runs continuously
  14. # Steve C.
  15. #=========================================================
  16. symbols
  17.  
  18. message  startup
  19. message  pulse
  20.  
  21. sector   pulsesector0
  22. sector   pulsesector1
  23. sector   pulsesector2
  24. sector   pulsesector3
  25. sector   pulsesector4
  26. sector   pulsesector5
  27. sector   pulsesector6
  28. sector   pulsesector7
  29.  
  30. float    pulseval=1.5       //time to Min or Max liteval
  31. float    minlite=0          //minimum light value
  32. float    maxlite=1          //maximum light value
  33. int      flag=0      local
  34. int      index=0     local
  35. int      numsects=0  local
  36.  
  37. end
  38.  
  39. ## Code Section
  40.  
  41. code
  42.  
  43. startup:
  44.    if (pulsesector0 >=0) numsects=numsects + 1;
  45.    if (pulsesector1 >=0) numsects=numsects + 1;
  46.    if (pulsesector2 >=0) numsects=numsects + 1;
  47.    if (pulsesector3 >=0) numsects=numsects + 1;
  48.    if (pulsesector4 >=0) numsects=numsects + 1;
  49.    if (pulsesector5 >=0) numsects=numsects + 1;
  50.    if (pulsesector6 >=0) numsects=numsects + 1;
  51.    if (pulsesector7 >=0) numsects=numsects + 1;
  52.    SetPulse(pulseval);
  53.    return;
  54.  
  55. pulse:
  56.    if (flag == 1)
  57.       {
  58.       for (index=0; index < numsects; index = index + 1)
  59.          {
  60.           SetSectorLight(pulsesector0[index], minlite, pulseval);
  61.          }
  62.       flag=0;
  63.       return;
  64.       }
  65.    else if (flag == 0)
  66.       {
  67.       for (index=0; index < numsects; index = index + 1)
  68.          {
  69.           SetSectorLight(pulsesector0[index], maxlite, pulseval);
  70.          }
  71.       flag=1;
  72.       return;
  73.       }
  74.    return;
  75. end
  76.  
  77.  
  78.